site Derived Type
type, private :: site
Components
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=float), | public | :: | h |
distance (m) |
|||
| integer(kind=short), | public | :: | oid |
identification code |
|||
| real(kind=float), | public | :: | theta |
anistropy angle |
|||
| real(kind=float), | public | :: | value |
observed value |
|||
| type(Coordinate), | public | :: | xyz |
position |
Source Code
TYPE site INTEGER (KIND = short) :: oid !! identification code REAL (KIND = float) :: value !!observed value REAL (KIND = float) :: h !! distance (m) REAL (KIND = float) :: theta !!anistropy angle TYPE (Coordinate) :: xyz !!position END TYPE site